home *** CD-ROM | disk | FTP | other *** search
/ Die Ultimative Software-P…i Collection 1996 & 1997 / Die Ultimative Software-Pakete CD-ROM fur Atari Collection 1996 & 1997.iso / p / pov / povlisti.ngs / crystal.pov < prev    next >
Encoding:
Text File  |  1992-07-02  |  2.0 KB  |  76 lines
  1. // Persistence Of Vision raytracer version 1.0 sample file.
  2.  
  3. //---------------------------------------------------------------------------
  4. // This scene file was designed to emulate the digitized photographic image
  5. // of a crystal sphere { on a checkerboard that David Buck took, and to
  6. // verify or refute the correctness of the current refractive functions
  7. // in POV-Ray.  The original image is available on CompuServe
  8. // (go comart), Library 17 by the name of crysta.gif.
  9. // Experiment with the index-of-refraction value for the crystal ball.
  10. //---------------------------------------------------------------------------
  11.  
  12. #include "colors.inc"
  13. #include "shapes.inc"
  14. #include "textures.inc"
  15.  
  16. max_trace_level 5
  17.  
  18. camera {
  19.    //    location <-0.75 12.5 -28>
  20.    location <-0.85 12.5 -28>
  21.    direction <0  0  4.125>
  22.    up  <0 1 0>
  23.    right <1.33333 0 0>
  24.    look_at <0.25 0.15  0>
  25. }
  26.  
  27. object { light_source { <-5 50 -5> colour red 0.85 green 0.85 blue 0.85 }}
  28. object { light_source { <-500 500 -500> colour DimGray }}
  29. // light (under checkerboard, for background
  30. object { light_source { <10 -50 5> colour White } }
  31.  
  32. // The background.  Designed to give the shaded quality of the photo
  33. object {
  34.    quadric { Ellipsoid 
  35.       scale <10000 500 500>
  36.       rotate <0 60 0>
  37.    }
  38.    colour Blue
  39.    texture { 0.025
  40.       ambient 0.2
  41.       diffuse 0.75
  42.       color Gray
  43.    }
  44. }
  45.  
  46. composite {
  47.    object {
  48.       intersection { Cube
  49.          scale <5 0.001 7>
  50.       }
  51.       colour Gray
  52.       texture { 0.015
  53.          checker color Black color White
  54.          ambient 0.35
  55.          diffuse 0.65
  56.          translate <1 0 7>
  57.       }
  58.    }
  59.  
  60.  
  61.    object {
  62.       sphere { <-0.25  2.15 -4.25> 2.15  }
  63.       colour White
  64.       texture {
  65.          color red 1.0 green 1.0 blue 1.0  alpha 0.75
  66.          ambient 0.2
  67.          diffuse 0.0
  68.          reflection 0.12
  69.          refraction 1.0
  70.          ior 1.45
  71.          specular 1.0 roughness 0.001
  72.       }
  73.    }
  74.    rotate <0 0 -6 >   /* Simulate the slight camera tilt in the photo */
  75. }
  76.